Создание простых цифровых часов с помощью Visual Basic 6.0 (VB) настолько простое, что с ним справится любой пользователь компьютера.
Порядок разработки:
Открываем Visual Basic 6.0 и выбираем пункт Standart exe.Добавляем в форму метку (Label) 
в панели элементов управления и элемент управления Timer 
Вид часов в стадии разработки:
Открываете окно свойств и формы и в свойстве Caption пишите "Часы Visual Basic",или что вам нравится.Затем в свойстве Timer установите Interval - 1000,это время обновления VB - 1000 миллисекунд или 1 секунда.Все остальные свойства оставляем по умолчанию.Далее открываем окно ввода кода и пишем
Private Sub Timer1_Timer() Label1.Caption = Time End Sub
И это все.Включаете пуск и если надо меняте размеры прямо в форме Сохраняем приложение и затем компилируем в меню Файл "Делать Project1.exe"
Внешний вид приложения:
Посмотрите приложение в работе
Скачайте исходник
Вы также можете изменить внешний вид часов оставив только поле с часами и можете добавить кнопку отключения часов ,как в примере со стрелочными часами.Попробуйте установить другие цвета по вашему желанию.
Для сайта
Анимация на сайте.gif){kind=small}
Программирование
